home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / Training / HyperCard 2.0 Training / Intro to HyperCard 2.0 / card_22318.txt < prev    next >
Text File  |  1990-08-24  |  4KB  |  181 lines
  1. -- card: 22318 from stack: in.0
  2. -- bmap block id: 22695
  3. -- flags: 0000
  4. -- background id: 15491
  5. -- name: graphics
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   reset
  9. end closeCard
  10.  
  11. on reset
  12.   lock screen
  13.   choose select tool
  14.   drag from 79,138 to 412,285
  15.   doMenu "clear picture"
  16.   choose browse tool
  17.   hide tool window
  18.   hide pattern window
  19.   unlock screen with dissolve
  20. end reset
  21.  
  22.  
  23.  
  24. -- part 1 (button)
  25. -- low flags: 00
  26. -- high flags: 2000
  27. -- rect: left=205 top=287 right=330 bottom=255
  28. -- title width / last selected line: 0
  29. -- icon id / first selected line: 0 / 0
  30. -- text alignment: 1
  31. -- font id: 0
  32. -- text size: 12
  33. -- style flags: 0
  34. -- line height: 16
  35. -- part name: drawIt
  36. ----- HyperTalk script -----
  37. -- Draw the hammer graphic
  38. on mouseUp
  39.   reset
  40.  
  41.   set cursor to none
  42.  
  43.   show tool window at "49,160"
  44.   show pattern window at "349,160"
  45.  
  46.   wait 50
  47.   choose line tool
  48.   set the lineSize to 1
  49.   --top:
  50.   drag from 159,163 to 159,157
  51.   drag from 159,157 to 154,154
  52.   drag from 154,154 to 148,154
  53.   drag from 148,154 to 134,163
  54.   drag from 134,163 to 134,165
  55.   drag from 134,165 to 148,157
  56.   wait 30
  57.  
  58.   --edge of Top:
  59.   drag from 134,165 to 136,169
  60.   drag from 136,169 to 140,165
  61.   drag from 140,165 to 149,160
  62.   drag from 149,160 to 157,161
  63.   drag from 157,161 to 158,162
  64.   wait 30
  65.  
  66.   --connection to part that hits:
  67.   drag from 159,158 to 167,159
  68.   drag from 167,159 to 167,165
  69.   drag from 167,165 to 159,163
  70.   wait 30
  71.  
  72.   --side of top:
  73.   drag from 136,169 to 139,171
  74.   drag from 139,171 to 148,165
  75.   drag from 148,165 to 149,169
  76.   drag from 149,169 to 154,169
  77.   drag from 154,169 to 159,166
  78.   drag from 159,166 to 167,167
  79.   drag from 167,167 to 167,165
  80.   wait 30
  81.  
  82.   --the part you hit the nail with:
  83.   drag from 167,167 to 167,169
  84.   drag from 167,169 to 172,169
  85.   drag from 172,169 to 172,157
  86.   drag from 172,157 to 167,157
  87.   drag from 167,157 to 167,165
  88.   wait 30
  89.  
  90.   --step down 1:
  91.   drag from 149,169 to 149,172
  92.   drag from 149,172 to 157,172
  93.   drag from 157,172 to 159,166
  94.   wait 30
  95.  
  96.   --step down 2:
  97.   drag from 149,172 to 150,178
  98.   drag from 150,178 to 156,178
  99.   drag from 156,178 to 157,172
  100.   wait 30
  101.  
  102.   --middle of handle:
  103.   drag from 150,178 to 150,201
  104.   drag from 150,201 to 145,265
  105.   drag from 145,265 to 149,266
  106.   drag from 149,266 to 154,266
  107.   drag from 154,266 to 157,265
  108.   drag from 157,265 to 156,201
  109.   drag from 156,201 to 156,178
  110.   wait 30
  111.  
  112.   --left edge of handle:
  113.   drag from 150,178 to 148,201
  114.   drag from 148,201 to 143,264
  115.   drag from 143,264 to 145,265
  116.   wait 30
  117.  
  118.   --right edge of handle:
  119.   drag from 156,178 to 158,218
  120.   drag from 158,218 to 160,262
  121.   drag from 160,262 to 157,265
  122.   wait 30
  123.  
  124.   --select the hammer to trace edges
  125.   choose select tool
  126.   drag from 125,148 to 193,272
  127.   wait 30
  128.  
  129.   doMenu "trace edges"
  130.   wait 30
  131.  
  132.   --fill in the hammer with patterns
  133.   choose bucket tool
  134.   set pattern to 12
  135.   click at 153,157
  136.   click at 154,164
  137.   click at 163,162
  138.   click at 154,164
  139.   click at 154,175
  140.   click at 170,163
  141.   wait 30
  142.  
  143.   set pattern to 35
  144.   click at 152,248
  145.   wait 30
  146.  
  147.   set pattern to 13
  148.   click at 157,199
  149.   wait 30
  150.  
  151.   --copy the hammer
  152.   choose select tool
  153.   drag from 125,148 to 193,272
  154.   doMenu "copy picture"
  155.   doMenu "paste picture"
  156.   wait 30
  157.  
  158.   drag from 159,210 to 300,210
  159.   doMenu "flip horizontal"
  160.   wait 30
  161.  
  162.   choose text tool
  163.   set textStyle to extend,bold
  164.   set textAlign to center
  165.   set textSize to 14
  166.   set textFont to Futura
  167.   click at 229,186
  168.   type "HyperCard‚Äî" & return & "An Information" & return & "Management" & return & "Tool"
  169.   wait 30
  170.  
  171.   hide tool window
  172.   hide pattern window
  173.   choose browse tool
  174. end mouseUp
  175.  
  176.  
  177.  
  178. -- part contents for background part 6
  179. ----- text -----
  180. HyperCard comes with its own set of painting tools.You can use these tools at any time while you are making a stack. (You can also import graphics from any program that saves in the MacPaint format.) Click the animation button to see a drawing produced with the tools.
  181.